home *** CD-ROM | disk | FTP | other *** search
| Emacs Compiled Lisp | 1998-10-28 | 3.1 KB |
open in: 
MacOS 8.1
|
Win98
|
DOS
view JSON data
|
view as text
This file was processed as: Emacs Compiled Lisp
(other/emacsCompiledLisp).
This format is not currently supported by dexvert.
| Confidence | Program | Detection | Match Type | Support
|
|---|
| 1%
| dexvert
| Emacs Compiled Lisp (other/emacsCompiledLisp)
| magic
| Unsupported |
| 100%
| file
| Emacs/XEmacs v19 byte-compiled Lisp data
| default
| |
| 99%
| file
| data
| default
| |
| 100%
| TrID
| Emacs/XEmacs byte-compiled Lisp (generic)
| default
|
|
hex view+--------+-------------------------+-------------------------+--------+--------+
|00000000| 3b 45 4c 43 13 00 00 00 | 0a 3b 3b 3b 20 63 6f 6d |;ELC....|.;;; com|
|00000010| 70 69 6c 65 64 20 62 79 | 20 65 72 69 6b 40 6e 61 |piled by| erik@na|
|00000020| 67 67 75 6d 2e 6e 6f 20 | 6f 6e 20 54 75 65 20 4a |ggum.no |on Tue J|
|00000030| 75 6e 20 32 35 20 31 34 | 3a 34 31 3a 35 31 20 31 |un 25 14|:41:51 1|
|00000040| 39 39 36 0a 3b 3b 3b 20 | 66 72 6f 6d 20 66 69 6c |996.;;; |from fil|
|00000050| 65 20 2f 68 6f 6d 65 2f | 67 64 2f 67 6e 75 2f 65 |e /home/|gd/gnu/e|
|00000060| 6d 61 63 73 2f 31 39 2e | 30 2f 6c 69 73 70 2f 70 |macs/19.|0/lisp/p|
|00000070| 70 2e 65 6c 0a 3b 3b 3b | 20 65 6d 61 63 73 20 76 |p.el.;;;| emacs v|
|00000080| 65 72 73 69 6f 6e 20 31 | 39 2e 33 31 2e 34 2e 0a |ersion 1|9.31.4..|
|00000090| 3b 3b 3b 20 62 79 74 65 | 63 6f 6d 70 20 76 65 72 |;;; byte|comp ver|
|000000a0| 73 69 6f 6e 20 46 53 46 | 20 32 2e 31 30 0a 3b 3b |sion FSF| 2.10.;;|
|000000b0| 3b 20 6f 70 74 69 6d 69 | 7a 61 74 69 6f 6e 20 69 |; optimi|zation i|
|000000c0| 73 20 6f 6e 2e 0a 3b 3b | 3b 20 74 68 69 73 20 66 |s on..;;|; this f|
|000000d0| 69 6c 65 20 75 73 65 73 | 20 6f 70 63 6f 64 65 73 |ile uses| opcodes|
|000000e0| 20 77 68 69 63 68 20 64 | 6f 20 6e 6f 74 20 65 78 | which d|o not ex|
|000000f0| 69 73 74 20 69 6e 20 45 | 6d 61 63 73 20 31 38 2e |ist in E|macs 18.|
|00000100| 0a 0a 28 69 66 20 28 61 | 6e 64 20 28 62 6f 75 6e |..(if (a|nd (boun|
|00000110| 64 70 20 27 65 6d 61 63 | 73 2d 76 65 72 73 69 6f |dp 'emac|s-versio|
|00000120| 6e 29 0a 09 20 28 6f 72 | 20 28 61 6e 64 20 28 62 |n).. (or| (and (b|
|00000130| 6f 75 6e 64 70 20 27 65 | 70 6f 63 68 3a 3a 76 65 |oundp 'e|poch::ve|
|00000140| 72 73 69 6f 6e 29 20 65 | 70 6f 63 68 3a 3a 76 65 |rsion) e|poch::ve|
|00000150| 72 73 69 6f 6e 29 0a 09 | 20 20 20 20 20 28 73 74 |rsion)..| (st|
|00000160| 72 69 6e 67 2d 6c 65 73 | 73 70 20 65 6d 61 63 73 |ring-les|sp emacs|
|00000170| 2d 76 65 72 73 69 6f 6e | 20 22 31 39 2e 32 39 22 |-version| "19.29"|
|00000180| 29 29 29 0a 20 20 20 20 | 28 65 72 72 6f 72 20 22 |))). |(error "|
|00000190| 60 70 70 2e 65 6c 27 20 | 77 61 73 20 63 6f 6d 70 |`pp.el' |was comp|
|000001a0| 69 6c 65 64 20 66 6f 72 | 20 45 6d 61 63 73 20 31 |iled for| Emacs 1|
|000001b0| 39 2e 32 39 20 6f 72 20 | 6c 61 74 65 72 22 29 29 |9.29 or |later"))|
|000001c0| 0a 0a 0a 23 40 35 37 20 | 2a 56 61 6c 75 65 20 6f |...#@57 |*Value o|
|000001d0| 66 20 70 72 69 6e 74 2d | 65 73 63 61 70 65 2d 6e |f print-|escape-n|
|000001e0| 65 77 6c 69 6e 65 73 20 | 75 73 65 64 20 62 79 20 |ewlines |used by |
|000001f0| 70 70 2d 2a 20 66 75 6e | 63 74 69 6f 6e 73 2e 1f |pp-* fun|ctions..|
|00000200| 0a 28 64 65 66 76 61 72 | 20 70 70 2d 65 73 63 61 |.(defvar| pp-esca|
|00000210| 70 65 2d 6e 65 77 6c 69 | 6e 65 73 20 74 20 28 23 |pe-newli|nes t (#|
|00000220| 24 20 2e 20 2d 34 35 36 | 29 29 0a 23 40 31 39 37 |$ . -456|)).#@197|
|00000230| 20 52 65 74 75 72 6e 20 | 61 20 73 74 72 69 6e 67 | Return |a string|
|00000240| 20 63 6f 6e 74 61 69 6e | 69 6e 67 20 74 68 65 20 | contain|ing the |
|00000250| 70 72 65 74 74 79 2d 70 | 72 69 6e 74 65 64 20 72 |pretty-p|rinted r|
|00000260| 65 70 72 65 73 65 6e 74 | 61 74 69 6f 6e 20 6f 66 |epresent|ation of|
|00000270| 20 4f 42 4a 45 43 54 2c | 0a 61 6e 79 20 4c 69 73 | OBJECT,|.any Lis|
|00000280| 70 20 6f 62 6a 65 63 74 | 2e 20 20 51 75 6f 74 69 |p object|. Quoti|
|00000290| 6e 67 20 63 68 61 72 61 | 63 74 65 72 73 20 61 72 |ng chara|cters ar|
|000002a0| 65 20 75 73 65 64 20 77 | 68 65 6e 20 6e 65 65 64 |e used w|hen need|
|000002b0| 65 64 20 74 6f 20 6d 61 | 6b 65 20 6f 75 74 70 75 |ed to ma|ke outpu|
|000002c0| 74 0a 74 68 61 74 20 60 | 72 65 61 64 27 20 63 61 |t.that `|read' ca|
|000002d0| 6e 20 68 61 6e 64 6c 65 | 2c 20 77 68 65 6e 65 76 |n handle|, whenev|
|000002e0| 65 72 20 74 68 69 73 20 | 69 73 20 70 6f 73 73 69 |er this |is possi|
|000002f0| 62 6c 65 2e 1f 0a 28 64 | 65 66 61 6c 69 61 73 20 |ble...(d|efalias |
|00000300| 27 70 70 2d 74 6f 2d 73 | 74 72 69 6e 67 20 23 5b |'pp-to-s|tring #[|
|00000310| 28 6f 62 6a 65 63 74 29 | 20 22 8a c0 c1 21 71 88 |(object)| "...!q.|
|00000320| c2 8e c3 c4 21 88 0d 1e | 06 c7 0e 08 70 5c 22 88 |....!...|....p\".|
|00000330| 29 65 62 88 6d 84 d8 00 | c9 ca 21 83 2f 00 c9 ca |)eb.m...|..!./...|
|00000340| 21 83 19 00 cb 75 88 82 | 23 00 c9 cc 21 83 7e 00 |!....u..|#...!.~.|
|00000350| cb 94 cb 56 83 7e 00 cb | 94 53 66 cd 55 83 7e 00 |...V.~..|.Sf.U.~.|
|00000360| 8a ce 94 62 88 cf 20 88 | d0 d1 60 66 5c 22 29 83 |...b.. .|..`f\").|
|00000370| 7e 00 cb 94 53 cb 95 7c | 88 d2 63 88 cf cb 21 88 |~...S..||..c...!.|
|00000380| c9 d3 21 83 73 00 d4 94 | d4 95 7c 88 82 77 00 d5 |..!.s...|..|..w..|
|00000390| d6 21 88 d7 cb 21 88 82 | 19 00 d8 d9 da 8f 83 a4 |.!...!..|........|
|000003a0| 00 db cb 21 88 dc dd 78 | 88 60 dc dd 77 88 60 7c |...!...x|.`..w.`||
|000003b0| 88 d0 de 60 53 66 5c 22 | 84 19 00 df 63 88 82 19 |...`Sf\"|....c...|
|000003c0| 00 d8 e0 e1 8f 83 d2 00 | c9 e2 21 83 b7 00 cb 75 |........|..!....u|
|000003d0| 88 82 ab 00 dc dd 78 88 | 60 dc dd 77 88 60 7c 88 |......x.|`..w.`|.|
|000003e0| d0 de 60 53 66 5c 22 84 | 19 00 df 63 88 82 19 00 |..`Sf\".|...c....|
|000003f0| 64 62 88 82 19 00 65 62 | 88 e3 20 88 e4 20 2a 87 |db....eb|.. .. *.|
|00000400| 22 20 5b 67 65 6e 65 72 | 61 74 65 2d 6e 65 77 2d |" [gener|ate-new-|
|00000410| 62 75 66 66 65 72 20 22 | 20 70 70 2d 74 6f 2d 73 |buffer "| pp-to-s|
|00000420| 74 72 69 6e 67 22 20 28 | 28 62 79 74 65 2d 63 6f |tring" (|(byte-co|
|00000430| 64 65 20 22 c0 70 21 87 | 22 20 5b 6b 69 6c 6c 2d |de ".p!.|" [kill-|
|00000440| 62 75 66 66 65 72 5d 20 | 32 29 29 20 6c 69 73 70 |buffer] |2)) lisp|
|00000450| 2d 6d 6f 64 65 2d 76 61 | 72 69 61 62 6c 65 73 20 |-mode-va|riables |
|00000460| 74 20 70 70 2d 65 73 63 | 61 70 65 2d 6e 65 77 6c |t pp-esc|ape-newl|
|00000470| 69 6e 65 73 20 70 72 69 | 6e 74 2d 65 73 63 61 70 |ines pri|nt-escap|
|00000480| 65 2d 6e 65 77 6c 69 6e | 65 73 20 70 72 69 6e 31 |e-newlin|es prin1|
|00000490| 20 6f 62 6a 65 63 74 20 | 6c 6f 6f 6b 69 6e 67 2d | object |looking-|
|000004a0| 61 74 20 22 5c 5c 73 28 | 5c 5c 7c 23 5c 5c 73 28 |at "\\s(|\\|#\\s(|
|000004b0| 22 20 31 20 22 5c 5c 28 | 71 75 6f 74 65 5b 20 09 |" 1 "\\(|quote[ .|
|000004c0| 5d 2b 5c 5c 29 5c 5c 28 | 5b 5e 2e 29 5d 5c 5c 29 |]+\\)\\(|[^.)]\\)|
|000004d0| 22 20 34 30 20 32 20 66 | 6f 72 77 61 72 64 2d 73 |" 40 2 f|orward-s|
|000004e0| 65 78 70 20 63 68 61 72 | 2d 65 71 75 61 6c 20 34 |exp char|-equal 4|
|000004f0| 31 20 22 27 22 20 22 5b | 20 09 5d 2a 29 22 20 30 |1 "'" "[| .]*)" 0|
|00000500| 20 65 72 72 6f 72 20 22 | 4d 61 6c 66 6f 72 6d 65 | error "|Malforme|
|00000510| 64 20 71 75 6f 74 65 22 | 20 62 61 63 6b 77 61 72 |d quote"| backwar|
|00000520| 64 2d 73 65 78 70 20 65 | 72 72 2d 76 61 72 20 28 |d-sexp e|rr-var (|
|00000530| 62 79 74 65 2d 63 6f 64 | 65 20 22 c0 c1 c2 21 88 |byte-cod|e "...!.|
|00000540| 87 22 20 5b 74 20 64 6f | 77 6e 2d 6c 69 73 74 20 |." [t do|wn-list |
|00000550| 31 5d 20 33 29 20 28 28 | 65 72 72 6f 72 29 29 20 |1] 3) ((|error)) |
|00000560| 62 61 63 6b 77 61 72 64 | 2d 63 68 61 72 20 22 20 |backward|-char " |
|00000570| 09 22 20 6e 69 6c 20 33 | 39 20 31 30 20 28 62 79 |." nil 3|9 10 (by|
|00000580| 74 65 2d 63 6f 64 65 20 | 22 c0 c1 c2 21 88 87 22 |te-code |"...!.."|
|00000590| 20 5b 74 20 75 70 2d 6c | 69 73 74 20 31 5d 20 33 | [t up-l|ist 1] 3|
|000005a0| 29 20 28 28 65 72 72 6f | 72 29 29 20 22 5c 5c 73 |) ((erro|r)) "\\s|
|000005b0| 29 22 20 69 6e 64 65 6e | 74 2d 73 65 78 70 20 62 |)" inden|t-sexp b|
|000005c0| 75 66 66 65 72 2d 73 74 | 72 69 6e 67 5d 20 33 20 |uffer-st|ring] 3 |
|000005d0| 28 23 24 20 2e 20 35 36 | 31 29 5d 29 0a 23 40 32 |(#$ . 56|1)]).#@2|
|000005e0| 34 37 20 4f 75 74 70 75 | 74 20 74 68 65 20 70 72 |47 Outpu|t the pr|
|000005f0| 65 74 74 79 2d 70 72 69 | 6e 74 65 64 20 72 65 70 |etty-pri|nted rep|
|00000600| 72 65 73 65 6e 74 61 74 | 69 6f 6e 20 6f 66 20 4f |resentat|ion of O|
|00000610| 42 4a 45 43 54 2c 20 61 | 6e 79 20 4c 69 73 70 20 |BJECT, a|ny Lisp |
|00000620| 6f 62 6a 65 63 74 2e 0a | 51 75 6f 74 69 6e 67 20 |object..|Quoting |
|00000630| 63 68 61 72 61 63 74 65 | 72 73 20 61 72 65 20 70 |characte|rs are p|
|00000640| 72 69 6e 74 65 64 20 77 | 68 65 6e 20 6e 65 65 64 |rinted w|hen need|
|00000650| 65 64 20 74 6f 20 6d 61 | 6b 65 20 6f 75 74 70 75 |ed to ma|ke outpu|
|00000660| 74 20 74 68 61 74 20 60 | 72 65 61 64 27 0a 63 61 |t that `|read'.ca|
|00000670| 6e 20 68 61 6e 64 6c 65 | 2c 20 77 68 65 6e 65 76 |n handle|, whenev|
|00000680| 65 72 20 74 68 69 73 20 | 69 73 20 70 6f 73 73 69 |er this |is possi|
|00000690| 62 6c 65 2e 0a 4f 75 74 | 70 75 74 20 73 74 72 65 |ble..Out|put stre|
|000006a0| 61 6d 20 69 73 20 53 54 | 52 45 41 4d 2c 20 6f 72 |am is ST|REAM, or|
|000006b0| 20 76 61 6c 75 65 20 6f | 66 20 60 73 74 61 6e 64 | value o|f `stand|
|000006c0| 61 72 64 2d 6f 75 74 70 | 75 74 27 20 28 77 68 69 |ard-outp|ut' (whi|
|000006d0| 63 68 20 73 65 65 29 2e | 1f 0a 28 64 65 66 61 6c |ch see).|..(defal|
|000006e0| 69 61 73 20 27 70 70 20 | 23 5b 28 6f 62 6a 65 63 |ias 'pp |#[(objec|
|000006f0| 74 20 26 6f 70 74 69 6f | 6e 61 6c 20 73 74 72 65 |t &optio|nal stre|
|00000700| 61 6d 29 20 22 c0 c1 5c | 6e 21 0b 86 09 00 5c 66 |am) "..\|n!....\f|
|00000710| 5c 22 87 22 20 5b 70 72 | 69 6e 63 20 70 70 2d 74 |\"." [pr|inc pp-t|
|00000720| 6f 2d 73 74 72 69 6e 67 | 20 6f 62 6a 65 63 74 20 |o-string| object |
|00000730| 73 74 72 65 61 6d 20 73 | 74 61 6e 64 61 72 64 2d |stream s|tandard-|
|00000740| 6f 75 74 70 75 74 5d 20 | 33 20 28 23 24 20 2e 20 |output] |3 (#$ . |
|00000750| 31 35 30 37 29 5d 29 0a | 23 40 32 31 35 20 45 76 |1507)]).|#@215 Ev|
|00000760| 61 6c 75 61 74 65 20 45 | 58 50 52 45 53 53 49 4f |aluate E|XPRESSIO|
|00000770| 4e 20 61 6e 64 20 70 72 | 65 74 74 79 2d 70 72 69 |N and pr|etty-pri|
|00000780| 6e 74 20 76 61 6c 75 65 | 20 69 6e 74 6f 20 61 20 |nt value| into a |
|00000790| 6e 65 77 20 64 69 73 70 | 6c 61 79 20 62 75 66 66 |new disp|lay buff|
|000007a0| 65 72 2e 0a 49 66 20 74 | 68 65 20 70 72 65 74 74 |er..If t|he prett|
|000007b0| 79 2d 70 72 69 6e 74 65 | 64 20 76 61 6c 75 65 20 |y-printe|d value |
|000007c0| 66 69 74 73 20 6f 6e 20 | 6f 6e 65 20 6c 69 6e 65 |fits on |one line|
|000007d0| 2c 20 74 68 65 20 6d 65 | 73 73 61 67 65 20 6c 69 |, the me|ssage li|
|000007e0| 6e 65 20 69 73 20 75 73 | 65 64 0a 69 6e 73 74 65 |ne is us|ed.inste|
|000007f0| 61 64 2e 20 20 56 61 6c | 75 65 20 69 73 20 61 6c |ad. Val|ue is al|
|00000800| 73 6f 20 63 6f 6e 73 65 | 64 20 6f 6e 20 74 6f 20 |so conse|d on to |
|00000810| 66 72 6f 6e 74 20 6f 66 | 20 76 61 72 69 61 62 6c |front of| variabl|
|00000820| 65 20 20 76 61 6c 75 65 | 73 20 27 73 0a 76 61 6c |e value|s 's.val|
|00000830| 75 65 2e 1f 0a 28 64 65 | 66 61 6c 69 61 73 20 27 |ue...(de|falias '|
|00000840| 70 70 2d 65 76 61 6c 2d | 65 78 70 72 65 73 73 69 |pp-eval-|expressi|
|00000850| 6f 6e 20 23 5b 28 65 78 | 70 72 65 73 73 69 6f 6e |on #[(ex|pression|
|00000860| 29 20 22 c0 09 21 5c 6e | 42 12 0b 1c c5 1b c6 90 |) "..!\n|B.......|
|00000870| c7 5c 6e 40 21 91 88 8a | c6 71 88 c8 20 2b 87 22 |.\n@!...|.q.. +."|
|00000880| 20 5b 65 76 61 6c 20 65 | 78 70 72 65 73 73 69 6f | [eval e|xpressio|
|00000890| 6e 20 76 61 6c 75 65 73 | 20 74 65 6d 70 2d 62 75 |n values| temp-bu|
|000008a0| 66 66 65 72 2d 73 68 6f | 77 2d 66 75 6e 63 74 69 |ffer-sho|w-functi|
|000008b0| 6f 6e 20 6f 6c 64 2d 73 | 68 6f 77 2d 66 75 6e 63 |on old-s|how-func|
|000008c0| 74 69 6f 6e 20 23 5b 28 | 62 75 66 29 20 22 8a 08 |tion #[(|buf) "..|
|000008d0| 71 88 65 62 88 c1 7f 88 | 60 54 64 57 84 1a 00 60 |q.eb....|`TdW...`|
|000008e0| 65 5a c2 20 59 83 3e 00 | 0b c4 20 c5 08 21 1e 06 |eZ. Y.>.|.. ..!..|
|000008f0| 1e 07 1e 08 65 62 88 c9 | ca 0e 06 21 21 88 cb 8e |....eb..|...!!...|
|00000900| cc 0e 06 21 88 cd ce 21 | 2c 82 44 00 cf d0 65 60 |...!...!|,.D...e`|
|00000910| 7b 5c 22 29 87 22 20 5b | 62 75 66 20 31 20 66 72 |{\")." [|buf 1 fr|
|00000920| 61 6d 65 2d 77 69 64 74 | 68 20 6f 6c 64 2d 73 68 |ame-widt|h old-sh|
|00000930| 6f 77 2d 66 75 6e 63 74 | 69 6f 6e 20 73 65 6c 65 |ow-funct|ion sele|
|00000940| 63 74 65 64 2d 77 69 6e | 64 6f 77 20 64 69 73 70 |cted-win|dow disp|
|00000950| 6c 61 79 2d 62 75 66 66 | 65 72 20 77 69 6e 64 6f |lay-buff|er windo|
|00000960| 77 20 6f 6c 64 2d 73 65 | 6c 65 63 74 65 64 20 74 |w old-se|lected t|
|00000970| 65 6d 70 2d 62 75 66 66 | 65 72 2d 73 68 6f 77 2d |emp-buff|er-show-|
|00000980| 66 75 6e 63 74 69 6f 6e | 20 6d 61 6b 65 2d 66 72 |function| make-fr|
|00000990| 61 6d 65 2d 76 69 73 69 | 62 6c 65 20 77 69 6e 64 |ame-visi|ble wind|
|000009a0| 6f 77 2d 66 72 61 6d 65 | 20 28 28 73 65 6c 65 63 |ow-frame| ((selec|
|000009b0| 74 2d 77 69 6e 64 6f 77 | 20 6f 6c 64 2d 73 65 6c |t-window| old-sel|
|000009c0| 65 63 74 65 64 29 29 20 | 73 65 6c 65 63 74 2d 77 |ected)) |select-w|
|000009d0| 69 6e 64 6f 77 20 72 75 | 6e 2d 68 6f 6f 6b 73 20 |indow ru|n-hooks |
|000009e0| 74 65 6d 70 2d 62 75 66 | 66 65 72 2d 73 68 6f 77 |temp-buf|fer-show|
|000009f0| 2d 68 6f 6f 6b 20 6d 65 | 73 73 61 67 65 20 22 25 |-hook me|ssage "%|
|00000a00| 73 22 5d 20 34 5d 20 22 | 2a 50 70 20 45 76 61 6c |s"] 4] "|*Pp Eval|
|00000a10| 20 4f 75 74 70 75 74 2a | 22 20 70 70 20 65 6d 61 | Output*|" pp ema|
|00000a20| 63 73 2d 6c 69 73 70 2d | 6d 6f 64 65 5d 20 33 20 |cs-lisp-|mode] 3 |
|00000a30| 28 23 24 20 2e 20 31 38 | 38 36 29 20 22 78 50 70 |(#$ . 18|86) "xPp|
|00000a40| 2d 65 76 61 6c 3a 20 22 | 5d 29 0a 23 40 31 35 32 |-eval: "|]).#@152|
|00000a50| 20 52 75 6e 20 60 70 70 | 2d 65 76 61 6c 2d 65 78 | Run `pp|-eval-ex|
|00000a60| 70 72 65 73 73 69 6f 6e | 27 20 6f 6e 20 73 65 78 |pression|' on sex|
|00000a70| 70 20 62 65 66 6f 72 65 | 20 70 6f 69 6e 74 20 28 |p before| point (|
|00000a80| 77 68 69 63 68 20 73 65 | 65 29 2e 0a 57 69 74 68 |which se|e)..With|
|00000a90| 20 61 72 67 75 6d 65 6e | 74 2c 20 70 72 65 74 74 | argumen|t, prett|
|00000aa0| 79 2d 70 72 69 6e 74 20 | 6f 75 74 70 75 74 20 69 |y-print |output i|
|00000ab0| 6e 74 6f 20 63 75 72 72 | 65 6e 74 20 62 75 66 66 |nto curr|ent buff|
|00000ac0| 65 72 2e 0a 49 67 6e 6f | 72 65 73 20 6c 65 61 64 |er..Igno|res lead|
|00000ad0| 69 6e 67 20 63 6f 6d 6d | 65 6e 74 20 63 68 61 72 |ing comm|ent char|
|00000ae0| 61 63 74 65 72 73 2e 1f | 0a 28 64 65 66 61 6c 69 |acters..|.(defali|
|00000af0| 61 73 20 27 70 70 2d 65 | 76 61 6c 2d 6c 61 73 74 |as 'pp-e|val-last|
|00000b00| 2d 73 65 78 70 20 23 5b | 28 61 72 67 29 20 22 c0 |-sexp #[|(arg) ".|
|00000b10| 20 60 c1 89 1a 1b 1c 1d | c6 0e 07 21 88 8a c8 c9 | `......|...!....|
|00000b20| 21 88 8a ca 79 88 cb cc | 21 29 83 43 00 60 5c 66 |!...y...|!).C.`\f|
|00000b30| 7b 12 cd ce 5c 6e 0b 23 | 83 3c 00 ca 94 54 13 5c |{...\n.#|.<...T.\|
|00000b40| 6e ca 0b 4f 5c 6e ca 95 | c1 4f 50 12 82 5c 22 00 |n..O\n..|.OP..\".|
|00000b50| cf 5c 6e 21 12 82 47 00 | cf 70 21 12 29 c6 0d 21 |.\n!..G.|.p!.)..!|
|00000b60| 88 0e 10 83 5a 00 d1 d2 | 5c 6e 21 21 63 82 5d 00 |....Z...|\n!!c.].|
|00000b70| d3 5c 6e 21 2c 87 22 20 | 5b 73 79 6e 74 61 78 2d |.\n!,." |[syntax-|
|00000b80| 74 61 62 6c 65 20 6e 69 | 6c 20 65 78 70 20 73 74 |table ni|l exp st|
|00000b90| 61 72 74 20 70 74 20 73 | 74 61 62 20 73 65 74 2d |art pt s|tab set-|
|00000ba0| 73 79 6e 74 61 78 2d 74 | 61 62 6c 65 20 65 6d 61 |syntax-t|able ema|
|00000bb0| 63 73 2d 6c 69 73 70 2d | 6d 6f 64 65 2d 73 79 6e |cs-lisp-|mode-syn|
|00000bc0| 74 61 78 2d 74 61 62 6c | 65 20 66 6f 72 77 61 72 |tax-tabl|e forwar|
|00000bd0| 64 2d 73 65 78 70 20 2d | 31 20 30 20 6c 6f 6f 6b |d-sexp -|1 0 look|
|00000be0| 69 6e 67 2d 61 74 20 22 | 5b 20 09 5d 2a 3b 22 20 |ing-at "|[ .]*;" |
|00000bf0| 73 74 72 69 6e 67 2d 6d | 61 74 63 68 20 22 5c 6e |string-m|atch "\n|
|00000c00| 5b 20 09 5d 2a 3b 2b 22 | 20 72 65 61 64 20 61 72 |[ .]*;+"| read ar|
|00000c10| 67 20 70 70 2d 74 6f 2d | 73 74 72 69 6e 67 20 65 |g pp-to-|string e|
|00000c20| 76 61 6c 20 70 70 2d 65 | 76 61 6c 2d 65 78 70 72 |val pp-e|val-expr|
|00000c30| 65 73 73 69 6f 6e 5d 20 | 34 20 28 23 24 20 2e 20 |ession] |4 (#$ . |
|00000c40| 32 36 34 31 29 20 22 50 | 22 5d 29 0a 28 70 72 6f |2641) "P|"]).(pro|
|00000c50| 76 69 64 65 20 28 71 75 | 6f 74 65 20 70 70 29 29 |vide (qu|ote pp))|
|00000c60| 0a | |. | |
+--------+-------------------------+-------------------------+--------+--------+
